﻿Public Class FormMenu

    Private Sub CácGiáTrịThamSốToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CácGiáTrịThamSốToolStripMenuItem.Click
        Dim f As New FormQuanLyThamSo()
        f.ShowDialog()
    End Sub

    Private Sub LậpPhiếuNhậpMớiToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles LậpPhiếuNhậpMớiToolStripMenuItem.Click
        Dim f As New FormPhieuNhapSach()
        f.ShowDialog()
    End Sub

    Private Sub ChỉnhSửaPhiếuNhậpToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ChỉnhSửaPhiếuNhậpToolStripMenuItem.Click
        Dim f As New FormDanhSachPhieuNhap()
        f.ShowDialog()
    End Sub

    Private Sub LậpHóaĐơnMớiToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles LậpHóaĐơnMớiToolStripMenuItem.Click
        Dim f As New FormLapHoaDonBanSach()
        f.ShowDialog()
    End Sub

    Private Sub ChỉnhSửaHoáĐơnToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ChỉnhSửaHoáĐơnToolStripMenuItem.Click
        Dim f As New FormDanhSachHoaDon()
        f.ShowDialog()
    End Sub

    Private Sub LậpPhiếuThuTiểnToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles LậpPhiếuThuTiểnToolStripMenuItem.Click
        Dim f As New FormPhieuThuTien()
        f.ShowDialog()
    End Sub

    Private Sub ChỉnhSửaPhiếuThuToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ChỉnhSửaPhiếuThuToolStripMenuItem.Click
        Dim f As New FormDanhSachPhieuThu()
        f.ShowDialog()
    End Sub

    Private Sub QuảnLýThểLoạiToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles QuảnLýThểLoạiToolStripMenuItem.Click
        Dim f As New FormThemXoaSuaTheLoai()
        f.ShowDialog()
    End Sub

    Private Sub DanhSáchSáchToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DanhSáchSáchToolStripMenuItem.Click
        Dim f As New FormDSSach()
        f.ShowDialog()
    End Sub

    Private Sub ThêmKháchHàngMớiToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ThêmKháchHàngMớiToolStripMenuItem.Click
        Dim f As New FormThemKhachHang()
        f.ShowDialog()
    End Sub

    Private Sub ChỉnhSửaKháchHàngToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ChỉnhSửaKháchHàngToolStripMenuItem.Click
        Dim f As New FormDanhSachKhachHang()
        f.ShowDialog()
    End Sub

    Private Sub SáchToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SáchToolStripMenuItem1.Click
        Dim f As New FormTraCuuSach()
        f.ShowDialog()
    End Sub

    Private Sub KháchHàngToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles KháchHàngToolStripMenuItem1.Click
        Dim f As New FormTraCuuKhachHang()
        f.ShowDialog()
    End Sub

    Private Sub ButtonThoat_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonThoat.Click
        Me.Close()
    End Sub

    Private Sub BáoCáoCôngNợToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BáoCáoCôngNợToolStripMenuItem1.Click
        Dim f As New FormBaoCaoCongNo()
        f.ShowDialog()
    End Sub

    Private Sub BáoCáoTồnToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BáoCáoTồnToolStripMenuItem1.Click
        Dim f As New FormBaoCaoTon()
        f.ShowDialog()
    End Sub

    
    Private Sub FormMenu_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub
End Class
